inherited dtmda_BaseInfo: Tdtmda_BaseInfo
  OldCreateOrder = True
  Left = 434
  Top = 249
  Height = 478
  Width = 724
  inherited adsMaster: TADODataSet
    CursorType = ctStatic
    CommandText = 
      'select * from da_BaseInfo where DataType=:@DataType'#13#10'order by Co' +
      'de'
    Parameters = <
      item
        Name = '@DataType'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 20
        Value = ''
      end>
    Left = 48
    object adsMasterID: TStringField
      FieldName = 'ID'
      Visible = False
    end
    object adsMasterCode: TStringField
      DisplayLabel = #32534#30721
      FieldName = 'Code'
    end
    object adsMasterName: TStringField
      DisplayLabel = #21517#31216
      FieldName = 'Name'
      Size = 50
    end
    object adsMasterEName: TStringField
      DisplayLabel = #33521#25991#21517#31216
      FieldName = 'EName'
      Size = 200
    end
    object adsMasterHelperCode: TStringField
      DisplayLabel = #21161#35760#31526
      FieldName = 'HelperCode'
    end
    object adsMasterDataType: TStringField
      Tag = 1
      DisplayLabel = #36164#26009#31867#21035
      FieldName = 'DataType'
    end
    object adsMasterStatus: TSmallintField
      DisplayLabel = #29366#24577
      FieldName = 'Status'
    end
    object adsMasterExtend1: TFloatField
      DisplayLabel = #25193#23637#23383#27573'1'
      FieldName = 'Extend1'
    end
    object adsMasterExtend2: TStringField
      DisplayLabel = #25193#23637#23383#27573'2'
      FieldName = 'Extend2'
    end
    object adsMasterExtend3: TFloatField
      DisplayLabel = #25193#23637#23383#27573'3'
      FieldName = 'Extend3'
    end
    object adsMasterHasUse: TBooleanField
      DisplayLabel = #26159#21542#20351#29992
      FieldName = 'HasUse'
    end
    object adsMasterHasSysDefine: TBooleanField
      DisplayLabel = #26159#21542#31995#32479#23450#20041
      FieldName = 'HasSysDefine'
    end
    object adsMasterHasDefault: TBooleanField
      DisplayLabel = #26159#21542#40664#35748
      FieldName = 'HasDefault'
    end
    object adsMasterHasCheck: TBooleanField
      DisplayLabel = #23457#26680#21542
      FieldName = 'HasCheck'
    end
    object adsMasterChecker: TStringField
      DisplayLabel = #23457#26680#20154
      FieldName = 'Checker'
    end
    object adsMasterCheckTime: TDateTimeField
      DisplayLabel = #23457#26680#26102#38388
      FieldName = 'CheckTime'
    end
    object adsMasterHasStop: TBooleanField
      DisplayLabel = #26159#21542#31105#29992
      FieldName = 'HasStop'
    end
    object adsMasterStoper: TStringField
      DisplayLabel = #31105#29992#20154
      FieldName = 'Stoper'
    end
    object adsMasterStopDate: TDateTimeField
      DisplayLabel = #31105#29992#26102#38388
      FieldName = 'StopDate'
    end
    object adsMasterStopMemo: TStringField
      DisplayLabel = #31105#29992#35828#26126
      FieldName = 'StopMemo'
      Size = 50
    end
    object adsMasterWriter: TStringField
      Tag = 1
      DisplayLabel = #24405#20837#20154
      FieldName = 'Writer'
    end
    object adsMasterWriteTime: TDateTimeField
      Tag = 1
      DisplayLabel = #24405#20837#26102#38388
      FieldName = 'WriteTime'
    end
    object adsMasterModifier: TStringField
      Tag = 1
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object adsMasterModifyTime: TDateTimeField
      Tag = 1
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object adsMasterRemark: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 800
    end
  end
  inherited frdsMain: TfrDBDataSet
    Left = 48
  end
  inherited adsMasterEdit: TADODataSet
    CursorType = ctStatic
    CommandText = 'select * from da_BaseInfo'
    Left = 48
    object adsMasterEditID: TStringField
      DisplayLabel = #20869#30721
      FieldName = 'ID'
      Visible = False
    end
    object adsMasterEditCode: TStringField
      DisplayLabel = #20195#30721
      FieldName = 'Code'
    end
    object adsMasterEditName: TStringField
      DisplayLabel = #21517#31216
      FieldName = 'Name'
      OnChange = adsMasterEditNameChange
      Size = 50
    end
    object adsMasterEditEName: TStringField
      DisplayLabel = #33521#25991#21517#31216
      FieldName = 'EName'
      Size = 200
    end
    object adsMasterEditHelperCode: TStringField
      DisplayLabel = #21161#35760#31526
      FieldName = 'HelperCode'
    end
    object adsMasterEditDataType: TStringField
      Tag = 1
      DisplayLabel = #31867#21035
      FieldName = 'DataType'
    end
    object adsMasterEditStatus: TSmallintField
      DisplayLabel = #29366#24577
      FieldName = 'Status'
    end
    object adsMasterEditExtend1: TFloatField
      DisplayLabel = #25193#23637#23383#27573'1'
      FieldName = 'Extend1'
    end
    object adsMasterEditExtend2: TStringField
      DisplayLabel = #25193#23637#23383#27573'2'
      FieldName = 'Extend2'
    end
    object adsMasterEditExtend3: TFloatField
      DisplayLabel = #25193#23637#23383#27573'3'
      FieldName = 'Extend3'
    end
    object adsMasterEditHasSysDefine: TBooleanField
      DisplayLabel = #26159#21542#31995#32479#23450#20041
      FieldName = 'HasSysDefine'
    end
    object adsMasterEditHasDefault: TBooleanField
      DisplayLabel = #26159#21542#40664#35748
      FieldName = 'HasDefault'
    end
    object adsMasterEditHasUse: TBooleanField
      DisplayLabel = #26159#21542#20351#29992
      FieldName = 'HasUse'
    end
    object adsMasterEditHasCheck: TBooleanField
      DisplayLabel = #23457#26680#21542
      FieldName = 'HasCheck'
    end
    object adsMasterEditChecker: TStringField
      DisplayLabel = #23457#26680#20154
      FieldName = 'Checker'
    end
    object adsMasterEditCheckTime: TDateTimeField
      DisplayLabel = #23457#26680#26102#38388
      FieldName = 'CheckTime'
    end
    object adsMasterEditHasStop: TBooleanField
      DisplayLabel = #26159#21542#31105#29992
      FieldName = 'HasStop'
    end
    object adsMasterEditStoper: TStringField
      DisplayLabel = #31105#29992#20154
      FieldName = 'Stoper'
    end
    object adsMasterEditStopDate: TDateTimeField
      DisplayLabel = #31105#29992#26102#38388
      FieldName = 'StopDate'
    end
    object adsMasterEditStopMemo: TStringField
      DisplayLabel = #31105#29992#35828#26126
      FieldName = 'StopMemo'
      Size = 50
    end
    object adsMasterEditWriter: TStringField
      Tag = 1
      DisplayLabel = #24405#20837#20154
      FieldName = 'Writer'
    end
    object adsMasterEditWriteTime: TDateTimeField
      Tag = 1
      DisplayLabel = #24405#20837#26102#38388
      FieldName = 'WriteTime'
    end
    object adsMasterEditModifier: TStringField
      Tag = 1
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object adsMasterEditModifyTime: TDateTimeField
      Tag = 1
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object adsMasterEditRemark: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 800
    end
  end
  object find_BaseInfoType: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    CommandText = 'select * from da_BaseInfoType'
    CommandTimeout = 0
    Parameters = <>
    Left = 224
    Top = 39
    object find_BaseInfoTypeCode: TStringField
      FieldName = 'Code'
    end
    object find_BaseInfoTypeName: TStringField
      FieldName = 'Name'
    end
    object find_BaseInfoTypeHelperCode: TStringField
      FieldName = 'HelperCode'
      Size = 50
    end
    object find_BaseInfoTypeStatus: TSmallintField
      FieldName = 'Status'
    end
    object find_BaseInfoTypeWriter: TStringField
      FieldName = 'Writer'
    end
    object find_BaseInfoTypeWriteTime: TDateTimeField
      FieldName = 'WriteTime'
    end
    object find_BaseInfoTypeModifier: TStringField
      FieldName = 'Modifier'
    end
    object find_BaseInfoTypeModifyTime: TDateTimeField
      FieldName = 'ModifyTime'
    end
    object find_BaseInfoTypeRemark: TStringField
      FieldName = 'Remark'
      Size = 100
    end
    object find_BaseInfoTypeHasStop: TBooleanField
      DisplayLabel = #26159#21542#31105#29992
      FieldName = 'HasStop'
    end
    object find_BaseInfoTypeID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object find_BaseInfoTypeHasUse: TBooleanField
      FieldName = 'HasUse'
    end
  end
end
